\begin{tabbing}
(\=Unfolds ``btrue bfalse bool`` ( {-}1)$\cdot$) \+
\\[0ex]CollapseTHEN ((ApFunToHypEquands `Z' case $Z$
\-\\[0ex]o\=f inl($x$) =$>$ 0\+
\\[0ex]$\mid$ inr($x$) =$>$ 1 $\mathbb{Z}$ ({-}1)) 
\\[0ex]CollapseTHEN (Auto$\cdot$)$\cdot$)$\cdot$
\-
\end{tabbing}